home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / util / misc / macv51.lha / Emulation_Setup < prev    next >
Text File  |  1994-07-01  |  10KB  |  312 lines
  1. ;**************************************************
  2. ;
  3. ;$VER: MAC Emulation Setup Installer v1.0 (30 Jun 1994)
  4. ;
  5. ; Title:
  6. ;    EMPLANT's MAC Emulation Setup Installer
  7. ; 
  8. ; Description:
  9. ;    The Commodore Installer Script for EMPLANT's
  10. ;    MAC emulation setup.
  11. ;
  12. ; Installer script by Jim Drew
  13. ;
  14. ;**************************************************
  15.  
  16. (set true 1)
  17. (set false 0)
  18. (set quote "\"")
  19. (set nothing "")
  20.  
  21. (set mode 0)                ;default to 32 bit mode
  22.  
  23. (set EMPLANT_dir (getassign "EMPLANT"))
  24.  
  25. ; check for EMPLANT: and abort if not installed!
  26.  
  27. (if  (not (exists "EMPLANT:MAC/Launcher/Launcher.info"))
  28.      (abort "\n\n\n\nYou *MUST* install EMPLANT's MAC emulation software "
  29.      "before using this program!  This program is designed only to allow "
  30.      "different setups to be used."
  31.      )
  32. )
  33.  
  34. (complete 5)
  35.  
  36. (set EMU_dir
  37. (tackon EMPLANT_dir "MAC")
  38. )
  39.  
  40. (set filename EMU_dir)
  41.  
  42. (set Launcher_dir
  43. (tackon EMU_dir "Launcher")
  44. )
  45.  
  46. (set machine
  47.      (askchoice
  48.           (prompt "Select the model of Amiga you are using:")
  49.           (help "\n\n\n\n\nSelect the model that closest matches your "
  50.           "system.  If you have an A4000/030 with an MMU added, select "
  51.           "\Amiga 4000/040\.\n\n\n\n\n\n\n\n"
  52.           @askchoice-help)
  53.                (choices "Amiga 2000 + accelerator w/MMU"
  54.                "Amiga 3000 w/HardKick ROMs"
  55.                "Amiga 3000 w/SoftKick ROMs"
  56.                "Amiga 4000/040"
  57.                "Amiga 4000/030"
  58.                "Other Amiga w/o MMU"
  59.                "I don't want to use the MMU!")
  60.           (default 3)
  61.      )
  62. )
  63.  
  64. (complete 90)
  65.  
  66. (if  (< machine 4)
  67.      (set mode
  68.           (askchoice
  69.                (prompt "Select the addressing mode for the emulation to use:")
  70.                (help "\nIt is highly recommend that you use this emulation "
  71.                "only with Apple's System 7.1 or later software.  This "
  72.                "requires that the emulation is setup in '32 bit mode'.\n\n"
  73.                "You should only use '24 bit' mode if you are going to be "
  74.                "using any version from System 6 thru System 7.0.1.\n\n"
  75.                "24 bit mode may be required for some older applications."
  76.                "\n\n\n\n\n"
  77.                @askchoice-help)
  78.                (choices "32 bit (System 7.1 and later)"
  79.                "24 bit (System 7.01 and earlier)")
  80.                (default 0)
  81.           )
  82.      )
  83. )
  84.  
  85. (complete 95)
  86.  
  87. (if  (< machine 4)
  88.      (if  (<> machine 2)
  89.           (
  90.           (set type "HardKickMMU")
  91.           (set icon_name "HardLaunch_")
  92.           (set flags
  93.                (askoptions
  94.                     (prompt "Setup Launch script options for:\n"
  95.                     "Any Amiga with an MMU & KickStart in ROM")
  96.                     (help "The following features are available with "
  97.                     "the HardLaunch_MAC script:\n\n"
  98.                     "QUIET:\n\n"
  99.                     "Turns off the screen flash when HardLaunch_MAC is "
  100.                     "started up (those of you using long 'beep' samples "
  101.                     "in Preferences will want to select this option.\n\n\n"
  102.                     "\n\n\n\n\n\nREMAP:\n\n"
  103.                     "It is possible to map the EMPLANT's hardware at the "
  104.                     "same memory location as a real MAC's hardware, increasing "
  105.                     "emulation compatibility.  This option may conflict with "
  106.                     "some Zorro III memory boards.\n\n\n"
  107.                     "\n\n\n\n\nFASTROM:\n\n"
  108.                     "The Amiga's Kickstart ROM can be mapped into FAST memory, "
  109.                     "which will result in an overall performance boost to the "
  110.                     "Amiga and EMPLANT's MAC emulation.  This option is highly "
  111.                     "recommended!\n\n\n\n\n"
  112.                     "\n\n\nNOCOPYBACK:\n\n"
  113.                     "Although we know of no programs to date that require this "
  114.                     "option, it exists in case an application can not handle "
  115.                     "the CopyBack mode of the 68040 processor.  It puts the "
  116.                     "processor into 'write-through' mode.\n\n\n\n\n\n\n\n"
  117.                     @askoptions-help)
  118.                     (choices
  119.                     "QUIET      - No screen flash on startup"
  120.                     "REMAP      - Remaps EMPLANT hardware"
  121.                     "FASTROM    - Remaps KickStart into FAST memory"
  122.                     "NOCOPYBACK - Turns off CopyBack mode for 68040s"
  123.                     )
  124.                     (default 6)
  125.                )
  126.           )
  127.           )
  128.  
  129. ;else machine is softkicked
  130.           (
  131.           (set type "SoftKickMMU")
  132.           (set icon_name "SoftLaunch_")
  133.           (set flags
  134.                (askoptions
  135.                     (prompt "Setup Launch script options for:\n"
  136.                     "SoftKick'd A3000")
  137.                     (help "The following features are available with "
  138.                     "the SoftLaunch_MAC script:\n\n"
  139.                     "QUIET:\n\n"
  140.                     "Turns off the screen flash when SoftLaunch_MAC is "
  141.                     "started up (those of you using long 'beep' samples "
  142.                     "in Preferences will want to select this option.\n\n\n"
  143.                     "\n\n\n\n\n\nREMAP:\n\n"
  144.                     "It is possible to map the EMPLANT's hardware at the "
  145.                     "same memory location as a real MAC's hardware, increasing "
  146.                     "emulation compatibility.  This option may conflict with "
  147.                     "some Zorro III memory boards.\n\n\n\n\n\n\n"
  148.                     @askoptions-help)
  149.                     (choices
  150.                     "QUIET      - No screen flash on startup"
  151.                     "REMAP      - Remaps EMPLANT hardware"
  152.                     )
  153.                     (default 2)
  154.                     )
  155.                )
  156.           )
  157.           )
  158.  
  159.      (
  160.      (set type "NoMMU")
  161.      (set icon_name "EC_Launch_")
  162.  
  163.      (Message "\n\nA T T E N T I O N ! ! !\n\n\n\n"
  164.      "Since your system will not be using an MMU, it is "
  165.      "recommended that you use the 'QD' video drivers."
  166.      "\n\n")
  167.      )
  168. )
  169.  
  170. (if  (= mode 0)
  171.      (
  172.      (set icon_name
  173.      (cat icon_name "MAC")
  174.      )
  175.      )
  176. )
  177.  
  178. (if  (= mode 1)
  179.      (
  180.      (set icon_name
  181.      (cat icon_name "24")
  182.      )
  183.      )
  184. )
  185.  
  186. (set filename
  187. (tackon filename icon_name)
  188. )
  189.  
  190. (complete 99)
  191.  
  192. (set iconify
  193.      (askchoice
  194.           (prompt "Select Startup Option:\n")
  195.           (help "\n\n\nWhen the " icon_name " script file is executed, "
  196.           "the emulation will startup and normally stay at the Emulation "
  197.           "Setup Screen.\n\n"
  198.           "It is possible to skip the setup screen and immediately run "
  199.           "the emulation, and even iconify it at the same time.\n\n\n\n"
  200.           @askchoice-help)
  201.                (choices "Skip Emulation Setup"
  202.                "Skip Emulation Setup & Iconify"
  203.                "Don't Skip Emulation Setup"
  204.                (default 2)
  205.                )
  206.      )
  207. )
  208.  
  209. ;delete file if it once existed.
  210.  
  211. (delete filename)
  212.  
  213. (textfile
  214. (dest filename)
  215. (if  (= type "HardKickMMU")
  216.      (append "\n"
  217.      "IF EXISTS " type "\n\n"
  218.      "c:echo " quote "Setting up MMU mirroring system for ROM based machines...." quote "\n\n"
  219.      ";Attention!!  HardKickMMU has 5 different options:\n\n"
  220.      "; -f    Turns on the FASTROM option (remaps KickStart into FAST memory).\n"
  221.      "; -w    Turns off CopyBack mode (turns on write-through, 68040 owners only).\n"
  222.      "; -h    Remaps the EMPLANT hardware to appear at the same memory location\n"
  223.      ";       that the MAC's hardware appears.\n"
  224.      "; -t    Maps 4K pages with MMU for video display refreshing, does not\n"
  225.      ";       mirror memory.  WILL NOT WORK IN 24 BIT MODE!!\n"
  226.      "; -q    Supress screen flash, also known as DisplayBeep().\n\n"
  227.      ";       You can use either upper or lower case letters (ie. -f or -F).\n"
  228.      ";       Options may be in any order.\n\n"
  229.      "HardKickMMU "
  230.      )
  231.      )
  232.  
  233. (if  (= type "SoftKickMMU")
  234.      (append "\n"
  235.      "IF EXISTS " type "\n\n"
  236.      "c:echo " quote "Setting up MMU mirroring system for SuperKickstart machines...." quote "\n\n"
  237.      ";Attention!!  SoftKickMMU has 2 different options:\n\n"
  238.      "; -h    Remaps the EMPLANT hardware to appear at the same memory location\n"
  239.      ";       that the MAC's hardware appears.\n"
  240.      "; -q    Supress screen flash, also known as DisplayBeep().\n\n"
  241.      ";       You can use either upper or lower case letters (ie. -h or -H).\n"
  242.      ";       Options may be in any order.\n\n"
  243.      "SoftKickMMU "
  244.      )
  245.      )
  246.  
  247.      (if  (IN flags 0)
  248.      (append "-q ")
  249.      )
  250.  
  251.      (if  (IN flags 1)
  252.      (append "-h ")
  253.      )
  254.  
  255.      (if  (IN flags 2)
  256.      (append "-f ")
  257.      )
  258.  
  259.      (if  (IN flags 3)
  260.      (append "-w ")
  261.      )
  262.  
  263.      (if  (< machine 4)
  264.           (if  (= mode 0)
  265.           (append "-t ")
  266.           )
  267.      )
  268.  
  269.      (append "\n\n"
  270.      "c:echo " quote " " quote "\n"
  271.      "c:echo " quote "Running emulation configuration menu...." quote "\n\n"
  272.      "RUN >NIL: <NIL: MACII "
  273.      )
  274.  
  275.      (if  (= iconify 0)
  276.      (append "-s ")
  277.      )
  278.  
  279.      (if  (= iconify 1)
  280.      (append "-i ")
  281.      )
  282.      (append "\n\n")
  283. )
  284.  
  285. (copyfiles
  286.      (source launcher_dir)
  287.      (dest EMU_dir)
  288.      (pattern "Launcher.info")
  289. )
  290.  
  291. (set oldname
  292. (tackon EMU_dir "launcher.info")
  293. )
  294.  
  295. (set filename
  296. (cat filename ".info")
  297. )
  298.  
  299. (rename oldname filename)
  300.  
  301. (complete 100)
  302.  
  303. (message "\n\n\n\n"
  304. "A T T E N T I O N ! ! !\n\n"
  305. "You must turn off the power to your Amiga before attempting "
  306. "to run the emulation.  Simply rebooting will NOT work, you "
  307. "MUST physically turn off of the Amiga with its power switch. "
  308. "No exceptions."
  309. )          
  310.  
  311. (exit)
  312.